home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Math Factory™ Demo ••••• / Math Factory™ Demo •••••.rsrc / CODE_31.txt < prev    next >
Text File  |  1988-01-30  |  20KB  |  350 lines
  1. # near model CODE resource
  2. # jump table entries: 800-801 (2 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. export_100:
  5. 00000004  4E56 FEF0                link       A6, -0x0110
  6. 00000008  302D E9C6                move.w     D0, [A5 - 0x163A]
  7. 0000000C  C1FC 0016                muls.w     D0, 0x16
  8. 00000010  7200                     moveq.l    D1, 0x00
  9. 00000012  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  10. 00000016  1230 0000                move.b     D1, [A0 + D0.w]
  11. 0000001A  0241 00FF                andi.w     D1, 0xFF
  12. 0000001E  0041 0100                ori.w      D1, 0x100
  13. 00000022  3D41 FEF0                move.w     [A6 - 0x110], D1
  14. 00000026  486E FEF0                pea.l      [A6 - 0x110]
  15. 0000002A  486E FFFC                pea.l      [A6 - 0x4]
  16. 0000002E  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  17. 00000032  0C6D 002D FA34           cmpi.w     [A5 - 0x5CC], 0x2D /* '-' */
  18. 00000038  57C0                     seq        D0
  19. 0000003A  4400                     neg.b      D0
  20. 0000003C  222E FFFC                move.l     D1, [A6 - 0x4]
  21. 00000040  5381                     subq.l     D1, 1
  22. 00000042  342D E852                move.w     D2, [A5 - 0x17AE]
  23. 00000046  48C2                     ext.l      D2
  24. 00000048  B481                     cmp.l      D2, D1
  25. 0000004A  5DC1                     slt        D1
  26. 0000004C  4401                     neg.b      D1
  27. 0000004E  C001                     and.b      D0, D1
  28. 00000050  6700 041C                beq        +0x41E /* 0000046E */
  29. 00000054  3F3C 0002                move.w     -[A7], 0x2
  30. 00000058  3F3C 0002                move.w     -[A7], 0x2
  31. 0000005C  A89B                     syscall    PenSize
  32. 0000005E  3F3C 000B                move.w     -[A7], 0xB
  33. 00000062  A89C                     syscall    PenMode
  34. 00000064  302D E852                move.w     D0, [A5 - 0x17AE]
  35. 00000068  5240                     addq.w     D0, 1
  36. 0000006A  E748                     lsl        D0.w, 3
  37. 0000006C  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  38. 00000070  3230 0000                move.w     D1, [A0 + D0.w]
  39. 00000074  0441 0015                subi.w     D1, 0x15
  40. 00000078  3F01                     move.w     -[A7], D1
  41. 0000007A  302D E852                move.w     D0, [A5 - 0x17AE]
  42. 0000007E  5240                     addq.w     D0, 1
  43. 00000080  E748                     lsl        D0.w, 3
  44. 00000082  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  45. 00000086  3230 0000                move.w     D1, [A0 + D0.w]
  46. 0000008A  0441 002D                subi.w     D1, 0x2D /* '-' */
  47. 0000008E  3F01                     move.w     -[A7], D1
  48. 00000090  A893                     syscall    MoveTo
  49. 00000092  302D E852                move.w     D0, [A5 - 0x17AE]
  50. 00000096  5240                     addq.w     D0, 1
  51. 00000098  E748                     lsl        D0.w, 3
  52. 0000009A  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  53. 0000009E  3230 0000                move.w     D1, [A0 + D0.w]
  54. 000000A2  5941                     subq.w     D1, 4
  55. 000000A4  3F01                     move.w     -[A7], D1
  56. 000000A6  302D E852                move.w     D0, [A5 - 0x17AE]
  57. 000000AA  5240                     addq.w     D0, 1
  58. 000000AC  E748                     lsl        D0.w, 3
  59. 000000AE  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  60. 000000B2  3230 0000                move.w     D1, [A0 + D0.w]
  61. 000000B6  0441 0040                subi.w     D1, 0x40 /* '@' */
  62. 000000BA  3F01                     move.w     -[A7], D1
  63. 000000BC  A891                     syscall    LineTo
  64. 000000BE  A89E                     syscall    PenNormal
  65. 000000C0  302D E852                move.w     D0, [A5 - 0x17AE]
  66. 000000C4  5240                     addq.w     D0, 1
  67. 000000C6  E748                     lsl        D0.w, 3
  68. 000000C8  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  69. 000000CC  3230 0000                move.w     D1, [A0 + D0.w]
  70. 000000D0  0441 000B                subi.w     D1, 0xB
  71. 000000D4  3F01                     move.w     -[A7], D1
  72. 000000D6  302D E852                move.w     D0, [A5 - 0x17AE]
  73. 000000DA  5240                     addq.w     D0, 1
  74. 000000DC  E748                     lsl        D0.w, 3
  75. 000000DE  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  76. 000000E2  3230 0000                move.w     D1, [A0 + D0.w]
  77. 000000E6  0441 0044                subi.w     D1, 0x44 /* 'D' */
  78. 000000EA  3F01                     move.w     -[A7], D1
  79. 000000EC  A893                     syscall    MoveTo
  80. 000000EE  486E FFF0                pea.l      [A6 - 0x10]
  81. 000000F2  302D E852                move.w     D0, [A5 - 0x17AE]
  82. 000000F6  5240                     addq.w     D0, 1
  83. 000000F8  E748                     lsl        D0.w, 3
  84. 000000FA  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  85. 000000FE  3230 0000                move.w     D1, [A0 + D0.w]
  86. 00000102  0441 000B                subi.w     D1, 0xB
  87. 00000106  3F01                     move.w     -[A7], D1
  88. 00000108  302D E852                move.w     D0, [A5 - 0x17AE]
  89. 0000010C  5240                     addq.w     D0, 1
  90. 0000010E  E748                     lsl        D0.w, 3
  91. 00000110  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  92. 00000114  3230 0000                move.w     D1, [A0 + D0.w]
  93. 00000118  0441 0051                subi.w     D1, 0x51 /* 'Q' */
  94. 0000011C  3F01                     move.w     -[A7], D1
  95. 0000011E  302D E852                move.w     D0, [A5 - 0x17AE]
  96. 00000122  5240                     addq.w     D0, 1
  97. 00000124  E748                     lsl        D0.w, 3
  98. 00000126  41ED E336                lea.l      A0, [A5 - 0x1CCA]
  99. 0000012A  3230 0000                move.w     D1, [A0 + D0.w]
  100. 0000012E  0441 000B                subi.w     D1, 0xB
  101. 00000132  5041                     addq.w     D1, 8
  102. 00000134  3F01                     move.w     -[A7], D1
  103. 00000136  302D E852                move.w     D0, [A5 - 0x17AE]
  104. 0000013A  5240                     addq.w     D0, 1
  105. 0000013C  E748                     lsl        D0.w, 3
  106. 0000013E  41ED E338                lea.l      A0, [A5 - 0x1CC8]
  107. 00000142  3230 0000                move.w     D1, [A0 + D0.w]
  108. 00000146  0441 0044                subi.w     D1, 0x44 /* 'D' */
  109. 0000014A  3F01                     move.w     -[A7], D1
  110. 0000014C  A8A7                     syscall    SetRect
  111. 0000014E  486E FFF0                pea.l      [A6 - 0x10]
  112. 00000152  486D FFD6                pea.l      [A5 - 0x2A]
  113. 00000156  A8A5                     syscall    FillRect
  114. 00000158  42AE FFFC                clr.l      [A6 - 0x4]
  115. 0000015C  302D E9C6                move.w     D0, [A5 - 0x163A]
  116. 00000160  C1FC 0016                muls.w     D0, 0x16
  117. 00000164  7200                     moveq.l    D1, 0x00
  118. 00000166  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  119. 0000016A  1230 0000                move.b     D1, [A0 + D0.w]
  120. 0000016E  48C1                     ext.l      D1
  121. 00000170  2D41 FFF8                move.l     [A6 - 0x8], D1
  122. 00000174  302D E852                move.w     D0, [A5 - 0x17AE]
  123. 00000178  0C40 0000                cmpi.w     D0, 0x0
  124. 0000017C  6600 0038                bne        +0x3A /* 000001B6 */
  125. 00000180  302D E9C6                move.w     D0, [A5 - 0x163A]
  126. 00000184  C1FC 0016                muls.w     D0, 0x16
  127. 00000188  222E FFF8                move.l     D1, [A6 - 0x8]
  128. 0000018C  5381                     subq.l     D1, 1
  129. 0000018E  D041                     add.w      D0, D1
  130. 00000190  7200                     moveq.l    D1, 0x00
  131. 00000192  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  132. 00000196  1230 0000                move.b     D1, [A0 + D0.w]
  133. 0000019A  0241 00FF                andi.w     D1, 0xFF
  134. 0000019E  0041 0100                ori.w      D1, 0x100
  135. 000001A2  3D41 FEF0                move.w     [A6 - 0x110], D1
  136. 000001A6  486E FEF0                pea.l      [A6 - 0x110]
  137. 000001AA  486E FFFC                pea.l      [A6 - 0x4]
  138. 000001AE  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  139. 000001B2  6000 0276                bra        +0x278 /* 0000042A */
  140. label000001B6:
  141. 000001B6  0C40 0001                cmpi.w     D0, 0x1
  142. 000001BA  6600 0038                bne        +0x3A /* 000001F4 */
  143. 000001BE  302D E9C6                move.w     D0, [A5 - 0x163A]
  144. 000001C2  C1FC 0016                muls.w     D0, 0x16
  145. 000001C6  222E FFF8                move.l     D1, [A6 - 0x8]
  146. 000001CA  5581                     subq.l     D1, 2
  147. 000001CC  D041                     add.w      D0, D1
  148. 000001CE  7200                     moveq.l    D1, 0x00
  149. 000001D0  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  150. 000001D4  1230 0000                move.b     D1, [A0 + D0.w]
  151. 000001D8  0241 00FF                andi.w     D1, 0xFF
  152. 000001DC  0041 0100                ori.w      D1, 0x100
  153. 000001E0  3D41 FEF0                move.w     [A6 - 0x110], D1
  154. 000001E4  486E FEF0                pea.l      [A6 - 0x110]
  155. 000001E8  486E FFFC                pea.l      [A6 - 0x4]
  156. 000001EC  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  157. 000001F0  6000 0238                bra        +0x23A /* 0000042A */
  158. label000001F4:
  159. 000001F4  0C40 0002                cmpi.w     D0, 0x2
  160. 000001F8  6600 0038                bne        +0x3A /* 00000232 */
  161. 000001FC  302D E9C6                move.w     D0, [A5 - 0x163A]
  162. 00000200  C1FC 0016                muls.w     D0, 0x16
  163. 00000204  222E FFF8                move.l     D1, [A6 - 0x8]
  164. 00000208  5781                     subq.l     D1, 3
  165. 0000020A  D041                     add.w      D0, D1
  166. 0000020C  7200                     moveq.l    D1, 0x00
  167. 0000020E  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  168. 00000212  1230 0000                move.b     D1, [A0 + D0.w]
  169. 00000216  0241 00FF                andi.w     D1, 0xFF
  170. 0000021A  0041 0100                ori.w      D1, 0x100
  171. 0000021E  3D41 FEF0                move.w     [A6 - 0x110], D1
  172. 00000222  486E FEF0                pea.l      [A6 - 0x110]
  173. 00000226  486E FFFC                pea.l      [A6 - 0x4]
  174. 0000022A  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  175. 0000022E  6000 01FA                bra        +0x1FC /* 0000042A */
  176. label00000232:
  177. 00000232  0C40 0003                cmpi.w     D0, 0x3
  178. 00000236  6600 0038                bne        +0x3A /* 00000270 */
  179. 0000023A  302D E9C6                move.w     D0, [A5 - 0x163A]
  180. 0000023E  C1FC 0016                muls.w     D0, 0x16
  181. 00000242  222E FFF8                move.l     D1, [A6 - 0x8]
  182. 00000246  5981                     subq.l     D1, 4
  183. 00000248  D041                     add.w      D0, D1
  184. 0000024A  7200                     moveq.l    D1, 0x00
  185. 0000024C  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  186. 00000250  1230 0000                move.b     D1, [A0 + D0.w]
  187. 00000254  0241 00FF                andi.w     D1, 0xFF
  188. 00000258  0041 0100                ori.w      D1, 0x100
  189. 0000025C  3D41 FEF0                move.w     [A6 - 0x110], D1
  190. 00000260  486E FEF0                pea.l      [A6 - 0x110]
  191. 00000264  486E FFFC                pea.l      [A6 - 0x4]
  192. 00000268  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  193. 0000026C  6000 01BC                bra        +0x1BE /* 0000042A */
  194. label00000270:
  195. 00000270  0C40 0004                cmpi.w     D0, 0x4
  196. 00000274  6600 0038                bne        +0x3A /* 000002AE */
  197. 00000278  302D E9C6                move.w     D0, [A5 - 0x163A]
  198. 0000027C  C1FC 0016                muls.w     D0, 0x16
  199. 00000280  222E FFF8                move.l     D1, [A6 - 0x8]
  200. 00000284  5B81                     subq.l     D1, 5
  201. 00000286  D041                     add.w      D0, D1
  202. 00000288  7200                     moveq.l    D1, 0x00
  203. 0000028A  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  204. 0000028E  1230 0000                move.b     D1, [A0 + D0.w]
  205. 00000292  0241 00FF                andi.w     D1, 0xFF
  206. 00000296  0041 0100                ori.w      D1, 0x100
  207. 0000029A  3D41 FEF0                move.w     [A6 - 0x110], D1
  208. 0000029E  486E FEF0                pea.l      [A6 - 0x110]
  209. 000002A2  486E FFFC                pea.l      [A6 - 0x4]
  210. 000002A6  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  211. 000002AA  6000 017E                bra        +0x180 /* 0000042A */
  212. label000002AE:
  213. 000002AE  0C40 0005                cmpi.w     D0, 0x5
  214. 000002B2  6600 0038                bne        +0x3A /* 000002EC */
  215. 000002B6  302D E9C6                move.w     D0, [A5 - 0x163A]
  216. 000002BA  C1FC 0016                muls.w     D0, 0x16
  217. 000002BE  222E FFF8                move.l     D1, [A6 - 0x8]
  218. 000002C2  5D81                     subq.l     D1, 6
  219. 000002C4  D041                     add.w      D0, D1
  220. 000002C6  7200                     moveq.l    D1, 0x00
  221. 000002C8  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  222. 000002CC  1230 0000                move.b     D1, [A0 + D0.w]
  223. 000002D0  0241 00FF                andi.w     D1, 0xFF
  224. 000002D4  0041 0100                ori.w      D1, 0x100
  225. 000002D8  3D41 FEF0                move.w     [A6 - 0x110], D1
  226. 000002DC  486E FEF0                pea.l      [A6 - 0x110]
  227. 000002E0  486E FFFC                pea.l      [A6 - 0x4]
  228. 000002E4  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  229. 000002E8  6000 0140                bra        +0x142 /* 0000042A */
  230. label000002EC:
  231. 000002EC  0C40 0006                cmpi.w     D0, 0x6
  232. 000002F0  6600 0038                bne        +0x3A /* 0000032A */
  233. 000002F4  302D E9C6                move.w     D0, [A5 - 0x163A]
  234. 000002F8  C1FC 0016                muls.w     D0, 0x16
  235. 000002FC  222E FFF8                move.l     D1, [A6 - 0x8]
  236. 00000300  5F81                     subq.l     D1, 7
  237. 00000302  D041                     add.w      D0, D1
  238. 00000304  7200                     moveq.l    D1, 0x00
  239. 00000306  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  240. 0000030A  1230 0000                move.b     D1, [A0 + D0.w]
  241. 0000030E  0241 00FF                andi.w     D1, 0xFF
  242. 00000312  0041 0100                ori.w      D1, 0x100
  243. 00000316  3D41 FEF0                move.w     [A6 - 0x110], D1
  244. 0000031A  486E FEF0                pea.l      [A6 - 0x110]
  245. 0000031E  486E FFFC                pea.l      [A6 - 0x4]
  246. 00000322  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  247. 00000326  6000 0102                bra        +0x104 /* 0000042A */
  248. label0000032A:
  249. 0000032A  0C40 0007                cmpi.w     D0, 0x7
  250. 0000032E  6600 0038                bne        +0x3A /* 00000368 */
  251. 00000332  302D E9C6                move.w     D0, [A5 - 0x163A]
  252. 00000336  C1FC 0016                muls.w     D0, 0x16
  253. 0000033A  222E FFF8                move.l     D1, [A6 - 0x8]
  254. 0000033E  5181                     subq.l     D1, 8
  255. 00000340  D041                     add.w      D0, D1
  256. 00000342  7200                     moveq.l    D1, 0x00
  257. 00000344  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  258. 00000348  1230 0000                move.b     D1, [A0 + D0.w]
  259. 0000034C  0241 00FF                andi.w     D1, 0xFF
  260. 00000350  0041 0100                ori.w      D1, 0x100
  261. 00000354  3D41 FEF0                move.w     [A6 - 0x110], D1
  262. 00000358  486E FEF0                pea.l      [A6 - 0x110]
  263. 0000035C  486E FFFC                pea.l      [A6 - 0x4]
  264. 00000360  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  265. 00000364  6000 00C4                bra        +0xC6 /* 0000042A */
  266. label00000368:
  267. 00000368  0C40 0008                cmpi.w     D0, 0x8
  268. 0000036C  6600 003C                bne        +0x3E /* 000003AA */
  269. 00000370  302D E9C6                move.w     D0, [A5 - 0x163A]
  270. 00000374  C1FC 0016                muls.w     D0, 0x16
  271. 00000378  222E FFF8                move.l     D1, [A6 - 0x8]
  272. 0000037C  0481 0000 0009           subi.l     D1, 0x9 /* '\t' */
  273. 00000382  D041                     add.w      D0, D1
  274. 00000384  7200                     moveq.l    D1, 0x00
  275. 00000386  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  276. 0000038A  1230 0000                move.b     D1, [A0 + D0.w]
  277. 0000038E  0241 00FF                andi.w     D1, 0xFF
  278. 00000392  0041 0100                ori.w      D1, 0x100
  279. 00000396  3D41 FEF0                move.w     [A6 - 0x110], D1
  280. 0000039A  486E FEF0                pea.l      [A6 - 0x110]
  281. 0000039E  486E FFFC                pea.l      [A6 - 0x4]
  282. 000003A2  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  283. 000003A6  6000 0082                bra        +0x84 /* 0000042A */
  284. label000003AA:
  285. 000003AA  0C40 0009                cmpi.w     D0, 0x9 /* '\t' */
  286. 000003AE  6600 003C                bne        +0x3E /* 000003EC */
  287. 000003B2  302D E9C6                move.w     D0, [A5 - 0x163A]
  288. 000003B6  C1FC 0016                muls.w     D0, 0x16
  289. 000003BA  222E FFF8                move.l     D1, [A6 - 0x8]
  290. 000003BE  0481 0000 000A           subi.l     D1, 0xA /* '\n' */
  291. 000003C4  D041                     add.w      D0, D1
  292. 000003C6  7200                     moveq.l    D1, 0x00
  293. 000003C8  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  294. 000003CC  1230 0000                move.b     D1, [A0 + D0.w]
  295. 000003D0  0241 00FF                andi.w     D1, 0xFF
  296. 000003D4  0041 0100                ori.w      D1, 0x100
  297. 000003D8  3D41 FEF0                move.w     [A6 - 0x110], D1
  298. 000003DC  486E FEF0                pea.l      [A6 - 0x110]
  299. 000003E0  486E FFFC                pea.l      [A6 - 0x4]
  300. 000003E4  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  301. 000003E8  6000 0040                bra        +0x42 /* 0000042A */
  302. label000003EC:
  303. 000003EC  0C40 000A                cmpi.w     D0, 0xA /* '\n' */
  304. 000003F0  6600 0038                bne        +0x3A /* 0000042A */
  305. 000003F4  302D E9C6                move.w     D0, [A5 - 0x163A]
  306. 000003F8  C1FC 0016                muls.w     D0, 0x16
  307. 000003FC  222E FFF8                move.l     D1, [A6 - 0x8]
  308. 00000400  0481 0000 000B           subi.l     D1, 0xB
  309. 00000406  D041                     add.w      D0, D1
  310. 00000408  7200                     moveq.l    D1, 0x00
  311. 0000040A  41ED F41A                lea.l      A0, [A5 - 0xBE6]
  312. 0000040E  1230 0000                move.b     D1, [A0 + D0.w]
  313. 00000412  0241 00FF                andi.w     D1, 0xFF
  314. 00000416  0041 0100                ori.w      D1, 0x100
  315. 0000041A  3D41 FEF0                move.w     [A6 - 0x110], D1
  316. 0000041E  486E FEF0                pea.l      [A6 - 0x110]
  317. 00000422  486E FFFC                pea.l      [A6 - 0x4]
  318. 00000426  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  319. label0000042A:
  320. 0000042A  202E FFFC                move.l     D0, [A6 - 0x4]
  321. 0000042E  5380                     subq.l     D0, 1
  322. 00000430  2D40 FFFC                move.l     [A6 - 0x4], D0
  323. 00000434  4AAE FFFC                tst.l      [A6 - 0x4]
  324. 00000438  6C00 000A                bge        +0xC /* 00000444 */
  325. 0000043C  2D7C 0000 0009 FFFC      move.l     [A6 - 0x4], 0x9 /* '\t' */
  326. label00000444:
  327. 00000444  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  328. 00000448  486D FB36                pea.l      [A5 - 0x4CA]
  329. 0000044C  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  330. 00000450  3F3C 0014                move.w     -[A7], 0x14
  331. 00000454  A887                     syscall    TextFont
  332. 00000456  3F3C 000C                move.w     -[A7], 0xC
  333. 0000045A  A88A                     syscall    TextSize
  334. 0000045C  486D FB36                pea.l      [A5 - 0x4CA]
  335. 00000460  A884                     syscall    DrawString
  336. 00000462  3F3C 000E                move.w     -[A7], 0xE
  337. 00000466  A887                     syscall    TextFont
  338. 00000468  3F3C 0018                move.w     -[A7], 0x18
  339. 0000046C  A88A                     syscall    TextSize
  340. label0000046E:
  341. 0000046E  4E5E                     unlink     A6
  342. 00000470  205F                     movea.l    A0, [A7]+
  343. 00000472  548F                     addq.l     A7, 2
  344. 00000474  4ED0                     jmp        [A0]
  345. 00000476  0000 0000                ori.b      D0, 0x0
  346. export_101:
  347. 0000047A  4E56 FFFA                link       A6, -0x0006
  348. 0000047E  4E5E                     unlink     A6
  349. 00000480  4E75                     rts
  350.